DATA$6 SUBSTR(F0,1,100)